home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1995 May / cd Ware (Juegos) Epimundo.iso / DOS / PRGMMING / CNVLIBD.ZIP / IS_4DOS.BAT < prev    next >
Encoding:
DOS Batch File  |  1993-06-21  |  1.2 KB  |  42 lines
  1. @echo off
  2. REM ********************************************************************
  3. REM *** Is_4DOS - Test if 4DOS is installed                          ***
  4. REM Jouni Miettunen * jon@stekt.oulu.fi * Oulu * Finland * Europe * 1993
  5. REM ********************************************************************
  6. @CEnvi %0.bat %1
  7. GOTO CENVI_EXIT
  8.  
  9. main(argc,argv)
  10. {
  11.    if ( argc != 1 )
  12.       Instructions();
  13.    else
  14.       is_4dos();
  15. } /*main*/
  16.  
  17. /* is_4dos ***************************************************************/
  18. /* determine if 4DOS is the parent process *******************************/
  19. /* this checks only, if 4DOS is installed, not if it's parent ************/
  20. /*************************************************************************/
  21. is_4dos()
  22. {
  23.    regs.ax = 0xd44d;
  24.    regs.bx = 0;
  25.    interrupt(0x2f,regs);
  26.    if (regs.ax == 0xd44d) puts("4DOS not loaded");
  27.    else {
  28.       sprintf(version,regs.bh>9?"%d.%d":"%d.0%d",regs.bl,regs.bh);
  29.       printf("4DOS %s loaded. ",version);
  30.    }
  31. } /* int is_4dos*/
  32.  
  33. Instructions()
  34. {
  35.    puts("");
  36.    puts("is_4dos - Test if 4DOS is installed");
  37.    puts("");
  38.    puts("Usage: is_4dos");
  39. }
  40.  
  41. :CENVI_EXIT
  42.